Citibike Usage Throughout the Day; (Trip Starts by Hour)
g_allday_hour = ggplot(my_citibike_df, mapping = aes(hour))
g_weekday_hour = ggplot(weekday_df, mapping = aes(hour))
g_weekend_hour = ggplot(weekend_df, mapping = aes(hour))
g_allday_hour + geom_bar() +
xlab("Hour of the Day") +
ylab("Number of Trips Started") +
ggtitle("Number of Citibike Trips Started Each Hour")
g_weekday_hour + geom_bar() +
xlab("Hour of the Day") +
ylab("Number of Trips Started") +
ggtitle("Number of Citibike Trips Started Each Hour (WEEKDAYS)")
g_weekend_hour + geom_bar() +
xlab("Hour of the Day") +
ylab("Number of Trips Started") +
ggtitle("Number of Citibike Trips Started Each Hour (WEEKENDS)")
Citibike Usage and Station Flow by Dock
#General Usage
maps_percent(0,23)
## Map from URL : http://maps.googleapis.com/maps/api/staticmap?center=New+York+City&zoom=12&size=640x640&scale=2&maptype=roadmap&language=en-EN&sensor=false
## Information from URL : http://maps.googleapis.com/maps/api/geocode/json?address=New%20York%20City&sensor=false
## Source: local data frame [5 x 4]
##
## start.station.name trips start.station.latitude
## (fctr) (dbl) (dbl)
## 1 Pershing Square North 1.2530900 40.75187
## 2 Broadway & E 22 St 0.8707495 40.74034
## 3 West St & Chambers St 0.7719048 40.71755
## 4 E 17 St & Broadway 0.7668833 40.73705
## 5 W 21 St & 6 Ave 0.7466210 40.74174
## Variables not shown: start.station.longitude (dbl)
## [1] 0.1781759
maps_ratio(0, 23)
## Map from URL : http://maps.googleapis.com/maps/api/staticmap?center=New+York+City&zoom=12&size=640x640&scale=2&maptype=roadmap&language=en-EN&sensor=false
## Information from URL : http://maps.googleapis.com/maps/api/geocode/json?address=New%20York%20City&sensor=false
## Source: local data frame [5 x 4]
##
## start.station.name trips_ratio start_trips end_trips
## (chr) (dbl) (int) (int)
## 1 W 42 St & Dyer Ave 2.066334 4143 2005
## 2 Penn Station Valet 1.652757 6654 4026
## 3 Bedford Ave & S 9 St 1.510204 296 196
## 4 Lafayette Ave & St James Pl 1.501094 686 457
## 5 Monroe St & Classon Ave 1.445378 344 238
## [1] 0.9996697
Citibike Station Flow by Dock, Hours 6-10
maps_ratio(6, 10)
## Map from URL : http://maps.googleapis.com/maps/api/staticmap?center=New+York+City&zoom=12&size=640x640&scale=2&maptype=roadmap&language=en-EN&sensor=false
## Information from URL : http://maps.googleapis.com/maps/api/geocode/json?address=New%20York%20City&sensor=false
## Source: local data frame [5 x 4]
##
## start.station.name trips_ratio start_trips end_trips
## (chr) (dbl) (int) (int)
## 1 Penn Station Valet 22.91575 6256 273
## 2 W 42 St & Dyer Ave 19.85714 3197 161
## 3 Monroe St & Classon Ave 13.93333 209 15
## 4 Greene Ave & Throop Ave 13.50000 135 10
## 5 E 14 St & Avenue B 12.20295 3307 271
## [1] 1.116037
Citibike Station Flow by Dock, Hours 11-15
maps_ratio(11, 15)
## Map from URL : http://maps.googleapis.com/maps/api/staticmap?center=New+York+City&zoom=12&size=640x640&scale=2&maptype=roadmap&language=en-EN&sensor=false
## Information from URL : http://maps.googleapis.com/maps/api/geocode/json?address=New%20York%20City&sensor=false
## Source: local data frame [5 x 4]
##
## start.station.name trips_ratio start_trips end_trips
## (chr) (dbl) (int) (int)
## 1 Throop Ave & Myrtle Ave 3.833333 46 12
## 2 Pulaski St & Marcus Garvey Blvd 2.687500 43 16
## 3 Putnam Ave & Nostrand Ave 2.421053 46 19
## 4 Monroe St & Tompkins Ave 2.346154 61 26
## 5 Lafayette Ave & St James Pl 2.065789 157 76
## [1] 1.004107
Citibike Station Flow by Dock, Hours 16-20
maps_ratio(16, 20)
## Map from URL : http://maps.googleapis.com/maps/api/staticmap?center=New+York+City&zoom=12&size=640x640&scale=2&maptype=roadmap&language=en-EN&sensor=false
## Information from URL : http://maps.googleapis.com/maps/api/geocode/json?address=New%20York%20City&sensor=false
## Source: local data frame [5 x 4]
##
## start.station.name trips_ratio start_trips end_trips
## (chr) (dbl) (int) (int)
## 1 W 52 St & 5 Ave 7.751304 4457 575
## 2 E 53 St & Lexington Ave 5.109302 2197 430
## 3 47 Ave & 31 St 4.288889 193 45
## 4 India St & East River 3.734375 239 64
## 5 E 47 St & Park Ave 3.676103 4415 1201
## [1] 0.9320456
With more Time
Compare activity with Revenue. Subscriber vs single payer
Work out color scale
Analyze hour choices more carefully